home *** CD-ROM | disk | FTP | other *** search
/ The Arsenal Files 6 / The Arsenal Files 6 (Arsenal Computer).ISO / tbbs / 1line10.zip / LINER.PRG < prev    next >
Text File  |  1996-03-19  |  2KB  |  35 lines
  1. PROCEDURE liner
  2. *
  3. ?? CHR(27)+"[40m"+CHR(27)+"[2J"+CHR(27)+"[41m "+CHR(27)+"[0;1;41mONELINER "+CHR(27)
  4. ?? "[46m  TBBS Oneliners  --- (C)1996 Jo"+CHR(27)+"[40m"+CHR(27)+"[s"+CHR(13)
  5. ?? CHR(27)+"[u"+CHR(27)+"[46mhn V. Baboval & Nimbus TBBS  "+CHR(27)+"[41m VE"
  6. ?? "R 1.0 "+CHR(27)+"[2;1H"+CHR(27)+"[0m▄▄▄▄▄▄▄▄▄▄▄▄▄▄"+CHR(27)+"[s"+CHR(13)
  7. ?? CHR(27)+"[u▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄▄"
  8. ?? "▄▄▄▄"+CHR(27)+"[3;1H"+CHR(27)+"[s"+CHR(13)+CHR(27)+"[u"+CHR(27)+"[44m█  "
  9. ?? "                                                   █       "+CHR(27)+"[4"
  10. ?? "0m"+CHR(27)+"[s"+CHR(13)+CHR(27)+"[u"+CHR(27)+"[44m                 "+CHR(27)
  11. ?? "[40m█"+CHR(27)+"[4;1H"+CHR(27)+"[44m█                           "+CHR(27)
  12. ?? "[40m"+CHR(27)+"[s"+CHR(13)+CHR(27)+"[u"+CHR(27)+"[44m                   "
  13. ?? "       █                        "+CHR(27)+"[40m█"+CHR(27)+"[5;1H"+CHR(27)
  14. ?? "[s"+CHR(13)+CHR(27)+"[u"+CHR(27)+"[44m█                                 "
  15. ?? "                    █       "+CHR(27)+"[40m"+CHR(27)+"[s"+CHR(13)+CHR(27)
  16. ?? "[u"+CHR(27)+"[44m                 "+CHR(27)+"[40m█"+CHR(27)+"[6;1H"+CHR(27)
  17. ?? "[44m█                           "+CHR(27)+"[40m"+CHR(27)+"[s"+CHR(13)+CHR(27)
  18. ?? "[u"+CHR(27)+"[44m                          █                        "+CHR(27)
  19. ?? "[40m█"+CHR(27)+"[7;1H"+CHR(27)+"[s"+CHR(13)+CHR(27)+"[u"+CHR(27)+"[44m█ "
  20. ?? "                                                    █       "+CHR(27)+"["
  21. ?? "40m"+CHR(27)+"[s"+CHR(13)+CHR(27)+"[u"+CHR(27)+"[44m                 "+CHR(27)
  22. ?? "[40m█"+CHR(27)+"[8;1H"+CHR(27)+"[44m█                           "+CHR(27)
  23. ?? "[40m"+CHR(27)+"[s"+CHR(13)+CHR(27)+"[u"+CHR(27)+"[44m                   "
  24. ?? "       █                        "+CHR(27)+"[40m█"+CHR(27)+"[9;1H"+CHR(27)
  25. ?? "[s"+CHR(13)+CHR(27)+"[u"+CHR(27)+"[44m█                                 "
  26. ?? "                    █       "+CHR(27)+"[40m"+CHR(27)+"[s"+CHR(13)+CHR(27)
  27. ?? "[u"+CHR(27)+"[44m                 "+CHR(27)+"[40m█"+CHR(27)+"[10;1H█"+CHR(27)
  28. ?? "[44m                          "+CHR(27)+"[40m"+CHR(27)+"[s"+CHR(13)+CHR(27)
  29. ?? "[u"+CHR(27)+"[44m                           █                        "+CHR(27)
  30. ?? "[40m█"+CHR(27)+"[11;1H▀▀"+CHR(27)+"[A"+CHR(13)+CHR(27)+"[2C▀▀▀▀▀▀▀▀▀▀▀▀▀"
  31. ?? "▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀"+CHR(27)+"[A"+CHR(13)
  32. ?? CHR(27)+"[73C▀▀▀▀▀▀▀"+CHR(27)+"[0m"+CHR(13)
  33. *
  34. RETURN
  35.